PROGRAM LIBRARY 


□ ECUS NO. 

8-130B 

TITLE 

RELCON - BINARY TO RELOCATABLE BINARY 
TAPE CONVERTER 

AUTHOR 

R. F. LaFontaine 

COMPANY 

Division of Mechanical Engineering 

C.S.I.R.O. 

Melbourne, Australia 

DATE 

March 8, 1968 

SOURCE LANGUAGE 



t 


Although this program has been tested by the contributor, no warranty, express or implied, is made by the contributor. 
Digital Equipment Computer Users Society or Digital Equipment Corporation as to the accuracy or functioning of the 
program or related program material, and no responsibility is assumed by these parties in connection therewith. 




V 






RELCON - BINARY TO RELOCATABLE BINARY TAPE CONVERTER 


DECUS Program Library Write-up 


DECUS No. 8-130B 


1. ABSTRACT 

RELCON converts standard DEC binary program tapes to a 
relocatable form acceptable to the Rebil8 loader. 

2. REQUIREMENTS 

2.1 Storage 

The program uses 600 octal memory locations. 

2.2 Equipment 

Minimum - PDP8/S and ASR-33. 

3. USAGE 

3.1 Loading 

The program is supplied as a relocatable binary tape and 
is loaded by Rebil8. 

Place RELCON in the tape reader and switch the reader ON. 

Place 7777 in the Switch Register and press Load Address. 

Place the memory address at which RELCON will start loading, then 
press Start. Refer to Rebil8 write-up for further information regarding 
relocatable program loading. 

3.2 Switch Settings 

Leave the Switch Register as set, but ensure that the SR bits 
5-11 are zero’s. The Switch Register now contains RELCON’s starting 
address. 

Note: If the Switch Register contained 7777, re-set the register to 0000. 

3. 3 Start Up 

Place the Address List in the reader and switch the reader ON. 
At installations having two tape readers, switch the second reader OFF. 
Switching the reader OFF LINE or removing tape from the reader will 
suffice. 

Press Load Address, then press Start. 

If the computer halts before the list is exhausted, a format error has 
been detected. Rectify the fault and repeat step 3. 3. 

3.4 DEC Binary Tape Reading 

Place the DEC binary tape in the reader and switch the 
reader ON. 

Note: RELCON copies leader/trailer code, so that the length of L/T 
produced by the punch is dependent on the length of L/T read. 

Press the Continue key and the DEC binary tape is read and converted. 

If the computer fails to run, a format error detected during step 3. 3 has 
been overlooked. Correct the faulty list and repeat step 3.3 
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If the trailer code fails to copy, an error has occured during DEC 
binary tape reading. Reposition the tape and repeat step 3.4. 


4. DESCRIPTION 


4.1 Discussion 


It is suggested that reference is made to Rebil8 write-up for a 
discussion on Address Modification and Data Modification before 
continuing. 


The principal duty of RELCON is to tag data, used by memory 
reference instructions for indirect addressing, with the Data Modification 
Mark (376 Code). It will, if required, also adjust addresses so that the 
relocatable version commences loading memory at page 0 if no Address 
modification is specified. This does not necessarily mean that the 
program will, or can, operate in this area of memory, but serves to 
simplify address specification at load time. 


For example, an unconverted binary program tape normally loading 
memory from location 5400, is converted to a relocatable tape with 
addresses justified to page 0. To load this program at location 1000, 
the absolute memory address (1000) is used as the Address Modification. 


If the program is not justified to page 0, an Address Modification of 
3400 (-4400j_ core locations would be used to load the program at 
address 1000. 


4.2 The Address List 

The list contains the lowest address occupied by the unconverted 
program, and the addresses of data to be tagged with the Data Modification 
Mark. 

If addresses are not to be page 0 justified, the lowest address is specified 
as 0(*0]_. 

5. LIST FORMAT 


5.1 List Structure 

An address list is shown in the following example - 

*200 241 605 777 1063 1065 1066 

1066 310 0437 $ 

The asterisk denotes the following octal number is the lowest address to 
be found on the DEC binary tape. The remaining numbers represent the 
addresses of data to be tagged with the 376 code. 

The dollar sign terminates the list. 

Numbers may be preceeded by and are terminated by spaces, carriage 
return, line feed, and Leader/Trailer. 

Deleted characters are ignored. 
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5.2 Errors 

An error is detected during List reading if one of the following 
conditions occur. 

The numeral 8 or 9» or characters not mentioned above appear in the 
List. 


The asterisk does not preceed the first encountered number. 
An asterisk appears elsewhere in the List. 

The List contains more than 136 data addresses. 


5.3 A program requiring conversion to relocatable binary but not containing out-of-page 
memory references must be accompanied by a list similar to that shown below. 


* XXXX 0 $ 


where * XXXX represents the lowest address on the unconverted tape, and 0 indicates 
no address list. 


Failure to comply with the above can result in spurious data modification marks appearing 
on the relocatable binary tape. 
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R EL CON 
BINARY 


TO RELOCATABLE BINARY TAPE CONVERTER 


0 600 

6014 

* 600 

RFC 


0 601 

6032 

KCC 

♦ 

0 602 

7600 

M200* -200 


0 603 

1354 

TAD R1 


0604 

3353 

DCA REF 


0605 

1355 

TAD LIM 


0606 

3350 

DCA TEMP 


0607 

3356 

DCA COUNT 


0610 

3357 

DCA MOD 


061 1 

4235 

JMS OCTIN 


0612 

5214 

JMP .+2 


0613 

5233 

JMP ERROR 

/ * MISSING 

0614 

1345 

TAD P6 


0615 

7440 

SZA 


061 6 

5233 

JMP ERROR 

/ILLEGAL BCD IN 

0617 

4235 

JMS OCTIN 

* 

0 620 

5233 

JMP ERROR 

/ILLEGAL BCD IN 

0 621 

0202 

AND M200 


0 622 

7041 

CIA 


0 623 

3357 

DCA MOD 


0 624 

4235 

JMS OCTIN 


0 625 

5233 

JMP ERROR 

/ILLEGAL BCD IN 

0 626 

3753 

DCA I REF 

/STORE DATA ADDRESS 

0627 

2356 

ISZ COUNT 


0 630 

2353 

ISZ REF 


0 631 

2350 

ISZ TEMP 


0 632 

5224 

JMP .-6 

/TOO MANY DATA ADDR 

0633 

7402 

ERROR* HLT 

0634 

5233 

JMP .-1 


0635 

0000 

OCTIN* 0 


0636 

3347 

DCA FLAG 


0 637 

3351 

DCA TEMP2 


0640 

4361 

INPUT* JMS 

READ 

0 641 

7450 

SNA 


0 642 

5302 

JMP TEST 

/BLANK TAPE 

0 643 

1335 

TAD M377 


0644 

7450 

SNA 


0645 

5240 

JMP INPUT 

/DELETE 

0646 

1340 

TAD PI 77 


0647 

7450 

SNA 


0650 

5302 

JMP TEST 

/LEADER-TRAILER 

0651 

1343 

TAD M12 


0 652 

7450 

SNA 


0653 

5302 

JMP TEST 

/LINE FEED 

0654 

1341 

TAD M3 


0655 

7450 

SNA 


0656 

5302 

JMP TEST 

/CARRIAGE RETURN 
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0657 
0660 
0 661 
0662 
0663 
0664 
0665 
0666 
0667 
0670 
0 67 1 
0672 
0673 
0674 
0 67 5 
0 67 6 
0677 
0700 
0701 
0702 
0 703 
0704 
0705 
0706 
0707 
0710 
0711 
0712 
0713 
0714 
0715 
0716 
0717 
0720 
0721 
0722 
0723 
0724 
0725 
0726 
0727 
0730 
0731 
0 732 
0733 
0734 
0735 
0736 
0737 
0740 


1344 

TAD 

M23 

7450 

SNA 


5302 

JMP 

TEST 

1342 

TAD 

M4 

7450 

SNA 


5760 

JMP 

I R2 

1344 

TAD 

M23 

7540 

SMA 

SZA 

5635 

JMP 

I OCTIN 

2347 

ISZ 

FLAG 

1346 

TAD 

P7 

7510 

SPA 


5635 

JMP 

I OCTIN 

3310 

DCA 

REPCH 

1351 

TAD 

TEMP2 

7106 

CLL 

RTL 

7004 

RAL 


1310 

TAD 

REPCH 

5237 

JMP 

INPUT- 1 

1347 

TEST* 

TAD FL 

7650 

SNA 

CL A 

5240 

JMP 

INPUT 

1351 

TAD 

TEMP2 

2235 

ISZ 

OCTIN 

5635 

JMP 

I OCTIN 

0000 

REPCH 

i* 0 

3350 

DCA 

TEMP 

1350 

TAD 

TEMP 

7012 

RTR 


7012 

RTR 


7012 

RTR 


4323 

JMS 

PCH 2 

1350 

TAD 

TEMP 

0334 

AND 

P77 

4323 

JMS 

PCH 2 

5710 

JMP 

I REPCH 

0000 

PCH2* 

0 

0340 

AND 

P1 77 

3351 

DCA 

TEMP2 

1351 

TAD 

TEMP2 

4737 

JMS 

I R8 

1351 

TAD 

TEMP2 

1736 

TAD 

I R7 

3736 

DCA 

I R7 

5723 

JMP 

I PCH 2 

0077 

P77* 

77 

7401 

M377* 

-377 

1 1 64 

R7, CHKOUT 

1143 

R8* PCH 

0177 

PI 77* 

1 77 


/SPACE 


/END OF FILE 


/BCD ERROR 


/BCD ERROR 


/END OF NUMBER? 

/NO 

/YES 


/DISASSEMBLES A 12-BIT WORD 
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0741 

7775 

M3, -3 



0742 

7774 

M 4, - 4 



0743 

7766 

Ml 2, -12 



0744 

7755 

M23, -23 



0745 

0006 

P6, 6 



0746 

0007 

P7, 7 



0747 

0000 

FLAG* 0 



0750 

0000 

TEMP, 0 



0751 

0000 

TEMP2, 0 



0752 

0000 

TEMP7, 0 



0Z53 

0000 

REF, 0 



0754 

1 170 

R1, R 6+ 1 



0755 

7570 

LIM, -210 



0756 

0000 

COUNT, 0 



0757 

0000 

MOD, 0 



0760 

1000 

R2, M376 



0761 

0000 

READ, 0 



0 762 

6011 

RSF 



0763 

5370 

JMP LSREAD 



0764 

6016 

RRB RFC 



0765 

3352 

DCA TEMP7 



0766 

1352 

TAD TEMP7 



0707 

5761 

JMP I READ 



0770 

6031 

LSREAD, KSF 



0771 

5362 

JMP READ+1 



0772 

6036 

KRB 



0773 

5365 

JMP READ+4 

PAGE 



1 000 

7402 

M376, HLT 



1 001 

6014 

RFC 



1 002 

6032 

KCC 



1 003 

7200 

CL A 



1 004 

3364 

DCA CHKOUT 



1 005 

4306 

JMS INP 



1 006 

5270 

JMP LEADER 

/PUNCH 

LEADER 

1 007 

3363 

BACK, DCA CHKSUM 



1010 

1756 

TAD I R3 



101 1 

7041 

CIA 



1012 

3351 

DCA TEMP3 



1013 

1357 

TAD R4 



1014 

3352 

DCA TEMP4 



1 015 

17 62 

TAD I R10 



1016 

3353 

DCA HI BYTE 



1017 

4761 

JMS I R9 



1 020 

3354 

DCA LOBYTE 



1 021 

4306 

JMS INP 



1 022 

5273 

JMP FINIS 

/FOUND 

TRAILER 

1 023 

4334 

JMS ASEMB 



1 024 

7420 

SNL 



1025 

5237 

JMP DPCH 
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1026 

3355 

DCA ADRES 


1 027 

1355 

TAD ADRES 


1 030 

1760 

TAD I R5 


1031 

7120 

STL 


1 032 

4767 

BACK2, JMS I R6 

/PUNCH DATA OR ADDRESS 

1 033 

1353 

TAD HI BYTE 


1034 

1354 

TAD LOBYTE 


1035 

13 63 

TAD CHKSUM 


1036 

5207 

JMP BACK 


1037 

3306 

DPCH, DCA INP 


1040 

1355 

TAD ADRES 


1 041 

7041 

CIA 


1042 

1752 

TAD I TEMP4 


1043 

7650 

SNA CL A 

/ADDRESS IN REFERENCE 

1 044 

5254 

JMP RELOC 

/YES 

1045 

2352 

ISZ TEMP4 

/UPDATE TABLE ADDRESS 

1 046 

2351 

ISZ TEMP3 

/UPDATE TABLE LIMIT 

1 047 

5240 

JMP .-7 


1050 

2355 

ISZ ADRES 


1051 

1306 

TAD INP 


1 052 

7100 

CLL 


1053 

5232 

JMP BACK2 

/COPY DATA 

1 054 

1306 

RELOC* TAD INP 


1055 

1760 

TAD I R5 

/MODIFY DATA 

1 056 

7100 

CLL 


1 057 

4767 

JMS I R6 


1060 

1267 

TAD P37 6 


1061 

4343 

JMS PCH 

/PUNCH DATA MOD. MARK 

1 062 

1267 

TAD P37 6 


1 063 

1364 

TAD CHKOUT 


1 064 

3364 

DCA CHKOUT 


1065 

2355 

ISZ ADRES 


1 066 

5233 

JMP BACK2+1 


10 67 

0376 

P376, 376 


1070 

1762 

LEADER, TAD I R10 

1070 

4343 

JMS PCH 


1 072 

5205 

JMP M376+5 


1073 

1364 

FINIS, TAD CHKOUT 

1 074 

7100 

CLL 


1075 

4767 

JMS I R6 


1076 

433 4 

JMS ASEMB 


1077 

7041 

CIA 


1 100 

1363 

TAD CHKSUM 


1 101 

7640 

SZA CLA 


1 102 

5200 

JMP M376 

/CHECKSUM ERROR 

1 103 

4761 

JMS I R9 


1 104 

4343 

JMS PCH 

/COPIES TRAILER 

1 105 

5303 

JMP .-2 

/END 


TABLE? 
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1 106 

0000 

INP, 

0 

1 107 

3365 

DCA 

SWITCH 

1110 

4761 

JMS 

I R9 

1111 

1200 

TAD 

M376 

1112 

7750 

SPA 

SNA CL A 

1 113 

5317 

JMP 

. + 4 

1114 

23 65 

ISZ 

SWITCH 

1115 

7040 

CM A 


1116 

5307 

JMP 

INP+l 

1 117 

1365 

TAD 

SWITCH 

1 120 

7640 

SZA 

CL A 

1 121 

5310 

JMP 

IN P+2 

1 122 

1762 

TAD 

I Rl0 

1 123 

0366 

AND 

P300 

1 124 

1347 

TAD 

M200A 

1 125 

7510 

SPA 


1 126 

2306 

ISZ 

INP 

1 127 

7750 

SPA 

SNA CL A 

1 130 

5706 

JMP 

I INP 

1 131 

1 762 

TAD 

I R1 0 

1 132 

4343 

JMS 

PCH 

1 133 

5307 

JMP 

INP+l 

1 134 

0000 

ASEMB, 0 

1 135 

1353 

TAD 

HI BY TE 

1 136 

7106 

CLL 

RTL 

1 137 

7006 

RTL 


1 140 

7006 

RTL 


1 141 

1354 

TAD 

LOBYTE 

1 1 42 

5734 

JMP 

I ASEMB 

1 143 

0000 

PCH, 

0 

1 144 

6046 

TLS 


1 1 45 

6041 

TSF 


1 146 

5345 

JMP 

.-1 

1 147 

7600 

M200A, 7600 

1 150 

5743 

JMP 

I PCH 

1 151 

0000 

TEMP3, 0 

1 152 

0000 

TEMP4, 0 

1 153 

0000 

HI BYTE, 0 

1 154 

0000 

LOBYTE, 0 

1 155 

0000 

ADRES, 0 

1 156 

0756 

R3, 

COUNT 

1 157 

1 170 

R4, 

R6+ 1 

1 1 60 

0757 

R5, 1 

MOD 

1 1 61 

0761 

R9 , 

READ 

1 162 

0752 

R1 0, 

TEMP7 

1 163 

0000 

CHKSUM, 0 

1 1 64 

0000 

CHKOUT, 0 

1 1 65 

0000 

SWITCH, 0 

1 1 66 

0300 

P300 

, 300 

1 167 

0710 

R 6# 

REPCH 


/EXTRACT DIAGNOSTIC 


/COPIES FIELD 
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ADRES 

1155 

ASEMB 

1134 

BACK 

1007 

BACK 2 

1032 

CHKOUT 

1 1 64 

CHKSUM 

1 1 63 

COUNT 

0756 

DPCH 

1037 

ERROR 

0633 

FINIS 

1073 

FLAG 

0747 

HI BYTE 

1153 

INP 

1106 

INPUT 

0640 

LEADER 

1070 

LIM 

0755 

LOBYTE 

1154 

LSREAD 

0770 

MOD 

0757 

M 12 

0743 

M 200 

0602 

M200A 

1147 

M23 

0744 

M3 

0741 

M 376 

1000 

M 377 

0735 

M 4 

0742 

OCTIN 

0635 

PCH 

1143 

PCH2 

0723 

P 177 

0740 

P300 

1 1 66 

P376 

10 67 

P6 

0745 

P7 

0746 

P77 

0734 

READ 

0761 

REF 

0753 

RELOC 

1054 

REPCH 

0710 



R 1 

0754 

R 10 

1 1 62 

R2 

0760 

R3 

1156 

R 4 

1157 

R5 

11 60 

R 6 

1167 

R7 

0736 

R8 

0737 

R9 

1161 

SWITCH 

1 1 65 

TEMP 

0750 

TEMP2 

0751 

TEMP3 

1151 

TEMP4 

1152 

TEMP7 

'3752 

TEST 

0702 



